<!-- html table generated in R 4.2.1 by xtable 1.8-4 package -->
<!-- Fri Jan  6 10:47:49 2023 -->
<table border=1>
<caption align="top"> Summary statistics of weekly Slack messages (Channels: public and private channels; Direct M.: direct messages between students or a student and the instructor) </caption>
<tr> <th> Module </th> <th> Delivery </th> <th> Channels (Mean) </th> <th> Channels (Median) </th> <th> Direct M. (Mean) </th> <th> Direct M. (Median) </th> <th> Students </th>  </tr>
  <tr> <td> Introduction to Statistics </td> <td> In Person </td> <td align="right"> 31 </td> <td align="right"> 17 </td> <td align="right"> 99 </td> <td align="right"> 54 </td> <td align="right"> 44 </td> </tr>
  <tr> <td> Introduction to Statistics </td> <td> Online </td> <td align="right"> 39 </td> <td align="right"> 43 </td> <td align="right"> 101 </td> <td align="right"> 82 </td> <td align="right"> 23 </td> </tr>
  <tr> <td> Project-Based Course </td> <td> In Person </td> <td align="right"> 57 </td> <td align="right"> 56 </td> <td align="right"> 96 </td> <td align="right"> 71 </td> <td align="right"> 12 </td> </tr>
  <tr> <td> Project-Based Course </td> <td> Online </td> <td align="right"> 163 </td> <td align="right"> 119 </td> <td align="right"> 220 </td> <td align="right"> 173 </td> <td align="right"> 13 </td> </tr>
   </table>
